home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Compute! Gazette 1994 August
/
1994-08b.d64
/
line checksum
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-09-20
|
721b
|
12 lines
10 rem relocatable basic line checksum sys x,<lines> - <lines> as in list
15 fori=49152toi+162:readx:pokei,x:next
20 data32,121,0,201,44,208,3,32,115,0,32,121,0,144,6,240,4,201,171,208,15,32
25 data107,169,32,19,166,32,121,0,240,17,201,171,240,5,162,11,108,0,3,32,115,0
30 data32,107,169,208,243,165,20,5,21,208,6,169,255,133,20,133,21
35 data169,0,133,172,133,173,169,5,133,170,169,128,133,171,160,1,177,95,240
40 data75,200,177,95,170,200,177,95,197,21,208,4,228,20,240,2,176,58,200
45 data132,73,164,73,177,95,240,35,133,6,162,8,6,6,106,41,128,69,173,6,172
50 data42,144,10,168,165,172,69,170,133,172,152,69,171,133,173,202,208,229
55 data230,73,208,215,160,0,177,95,170,200,177,95,134,95,133,96,208,175,166
60 data172,165,173,76,205,189